home *** CD-ROM | disk | FTP | other *** search
/ By Popular Request 2.0 / By Popular Request 2.0 (Arsenal Computer).ISO / amiga_6 / write473.lha / WRITE / Module / REPLACE_ALL.MENU < prev    next >
Text File  |  1995-05-22  |  658b  |  26 lines

  1. /*
  2.  *   $VER: REPLACE_ALL.MENU 4.0039 (22-Mai-95)
  3.  */
  4.  
  5. VERSIONCHECK 40000 "REPLACE_ALL.MENU"
  6.  
  7.  
  8. ITEM "Ersetze alle ..." ""
  9.   GETFINDREPLACE _FINDSTRING _REPLACESTRING {@REPLACE}
  10.   IF 
  11.     COMPARE _MARKED 2;
  12.     REPLACE @MARKA @MARKA @MARKB @MARKB {@ALL};
  13.     REPLACE @CURSOR @CURSOR @EOT @EOT {@ALL};
  14.   FLASH;
  15.  
  16. ITEM "Ersetze alle schnell ..." ""
  17.   GETFINDREPLACE _FINDSTRING _REPLACESTRING {@REPLACE}
  18.   SILENT
  19.   IF 
  20.     COMPARE _MARKED 2;
  21.     REPLACE @MARKA @MARKA @MARKB @MARKB {@ALL @NOREQ};
  22.     REPLACE @CURSOR @CURSOR @EOT @EOT {@ALL @NOREQ};
  23.   WINDOW 0 0 0 0 
  24.   MESSAGEOK "Es wurde $_RN$ mal\n\"$_FindString$\"\ndurch\n\"$_ReplaceString$\"\nersetzt." ;
  25.  
  26.